# /*  Copyright (c) 2020 - ~, WANGXI
#  *  
#  *  NS EXPAND TEST TCL FILE
#  *  Create MyAgent (This will give two warning message that
#  *  no default vaules exist my_var1_otcl and my_var2_otcl)
#  *  set myagent [new Agent/MyAgentOtcl]
#  * 
#  *  Clone from https://gitee.com/WangXi_Chn/ns2_modulelib
#  *  Note in https://www.yuque.com/wangxi_chn
#  *  
#  *  Change Logs:
#  *  Date           Author     Notes			Mail
#  *  2020-12-15     WangXi     first version	WangXi_Chn@foxmail.com
# */

set myagent [new Agent/MyAgentOtcl]

# Set configurable parameters of MyAgent
$myagent set my_var1_otcl 2
$myagent set my_var2_otcl 3.14

# Give a command to MyAgent
$myagent call-my-priv-func





#/************************ (C) COPYRIGHT 2020 WANGXI **************END OF FILE****/
